From: Sam Steingold <sds@gnu.org>
Date: Tue, 12 Jun 2007 13:37:56 +0000 (+0000)
Subject: (vc-arch-command): Also try "baz" and "bzr".
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~18468
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=ecb38f563c447e3ddf6775e99353799757997d0b;p=emacs.git

(vc-arch-command): Also try "baz" and "bzr".
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 086da569412..db8fca98edc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-06-12  Sam Steingold  <sds@gnu.org>
+
+	* vc-arch.el (vc-arch-command): Also try "baz" and "bzr".
+
 2007-06-12  Juanma Barranquero  <lekktu@gmail.com>
 
 	* desktop.el (desktop-load-locked-desktop): New option.
diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el
index 488f9108d36..e3dc76b090a 100644
--- a/lisp/vc-arch.el
+++ b/lisp/vc-arch.el
@@ -62,7 +62,7 @@
 ;;;
 
 (defvar vc-arch-command
-  (let ((candidates '("tla")))
+  (let ((candidates '("tla" "baz" "bzr")))
     (while (and candidates (not (executable-find (car candidates))))
       (setq candidates (cdr candidates)))
     (or (car candidates) "tla")))